home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
wantan1a
/
form49.frm
< prev
next >
Wrap
Text File
|
1999-09-14
|
25KB
|
941 lines
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Begin VB.Form Form49
BackColor = &H00808080&
BorderStyle = 1 'Fixed Single
Caption = "ErrorR's Macro Shop By: |2eV"
ClientHeight = 4485
ClientLeft = 1185
ClientTop = 2085
ClientWidth = 6720
BeginProperty Font
Name = "Comic Sans MS"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "Form49.frx":0000
LinkTopic = "Form49"
MaxButton = 0 'False
MinButton = 0 'False
PaletteMode = 1 'UseZOrder
ScaleHeight = 4485
ScaleWidth = 6720
Begin VB.Frame Frame4
BackColor = &H80000008&
BorderStyle = 0 'None
Caption = "Frame4"
Height = 1815
Left = 5400
TabIndex = 9
Top = 2520
Width = 1215
Begin VB.ListBox List5
BackColor = &H80000007&
ForeColor = &H000000FF&
Height = 1500
ItemData = "Form49.frx":1272
Left = 120
List = "Form49.frx":12B8
MouseIcon = "Form49.frx":135B
MousePointer = 99 'Custom
TabIndex = 10
Top = 120
Width = 975
End
End
Begin VB.Frame Frame3
BackColor = &H80000012&
BorderStyle = 0 'None
Caption = "Frame3"
Height = 615
Left = 5400
TabIndex = 7
Top = 1680
Width = 1215
Begin VB.ListBox List4
BackColor = &H80000006&
ForeColor = &H000000FF&
Height = 300
ItemData = "Form49.frx":14AD
Left = 120
List = "Form49.frx":14CF
MouseIcon = "Form49.frx":1519
MousePointer = 99 'Custom
TabIndex = 8
Top = 120
Width = 975
End
End
Begin VB.Frame Frame2
BackColor = &H80000008&
BorderStyle = 0 'None
Caption = "Frame2"
Height = 615
Left = 5400
TabIndex = 5
Top = 840
Width = 1215
Begin VB.ListBox List3
BackColor = &H80000008&
ForeColor = &H000000FF&
Height = 300
ItemData = "Form49.frx":166B
Left = 120
List = "Form49.frx":168D
MouseIcon = "Form49.frx":16D7
MousePointer = 99 'Custom
TabIndex = 6
Top = 120
Width = 975
End
End
Begin VB.Frame Frame1
BackColor = &H80000009&
BorderStyle = 0 'None
Height = 495
Left = 5400
TabIndex = 3
Top = 120
Width = 1215
Begin VB.CommandButton Command1
BackColor = &H8000000E&
Caption = "Send"
Height = 255
Left = 120
MouseIcon = "Form49.frx":1829
MousePointer = 99 'Custom
Style = 1 'Graphical
TabIndex = 4
Top = 120
Width = 975
End
End
Begin VB.TextBox Text1
BackColor = &H80000014&
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 3255
Left = 120
MultiLine = -1 'True
ScrollBars = 3 'Both
TabIndex = 2
Top = 1080
Width = 5175
End
Begin MSComDlg.CommonDialog CommonDialog1
Left = 5160
Top = 4560
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.ListBox List2
BackColor = &H00FFFFFF&
Columns = 6
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 480
ItemData = "Form49.frx":197B
Left = 120
List = "Form49.frx":197D
MouseIcon = "Form49.frx":197F
MousePointer = 99 'Custom
TabIndex = 1
Top = 600
Width = 5175
End
Begin VB.ListBox List1
BackColor = &H00FFFFFF&
Columns = 87
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 480
ItemData = "Form49.frx":1AD1
Left = 120
List = "Form49.frx":1AD3
MouseIcon = "Form49.frx":1AD5
MousePointer = 99 'Custom
MultiSelect = 1 'Simple
TabIndex = 0
Top = 120
Width = 5175
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "Fore Color:"
Height = 255
Left = 5520
MouseIcon = "Form49.frx":1C27
MousePointer = 99 'Custom
TabIndex = 16
Top = 600
Width = 975
End
Begin VB.Label Label6
BackColor = &H00404040&
Height = 255
Left = 5400
TabIndex = 15
Top = 600
Width = 1215
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "Back Color:"
Height = 255
Left = 5520
MouseIcon = "Form49.frx":1F31
MousePointer = 99 'Custom
TabIndex = 14
Top = 1440
Width = 975
End
Begin VB.Label Label5
BackColor = &H00404040&
Height = 255
Left = 5400
TabIndex = 13
Top = 1440
Width = 1215
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "HTML: "
Height = 255
Left = 5520
MouseIcon = "Form49.frx":223B
MousePointer = 99 'Custom
TabIndex = 12
Top = 2280
Width = 1095
End
Begin VB.Label Label4
BackColor = &H00404040&
Height = 255
Left = 5400
TabIndex = 11
Top = 2280
Width = 1215
End
Begin VB.Line Line8
BorderColor = &H80000003&